Sunrise Express Series 285/Sunrise Express Series 285.iso/pc/JR.Dxr/00032_Go to Previous Marker.ls

Text File | 1998-05-11 | 842 b | 37 lines

property whichevent

on initGotoPreviousMarker me
  init(me)
end

on mouseUp me
  if whichevent = #mouseUp then
    init(me)
  end if
end

on prepareFrame me
  if whichevent = #prepareFrame then
    init(me)
  end if
end

on exitFrame me
  if whichevent = #exitFrame then
    init(me)
  end if
end

on init me
  go(marker(-1))
end

on getPropertyDescriptionList
  set p_list to [#whichevent: [#comment: "Initializing Event:", #format: #symbol, #range: [#mouseUp, #prepareFrame, #exitFrame, #initGotoPreviousMarker], #default: #mouseUp]]
  return p_list
end

on getBehaviorDescription
  return "Moves the Playback Head to the previous marker when the specified event occurs.  Drag to a sprite or a frame in the script channel." && RETURN & "PARAMETERS:" && RETURN & "窶｢ Initializing Event - Specify the event that triggers the behavior."
end